home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Mission 3
/
Mission 3.zip
/
Mission 3.iso
/
zugabe
/
va45
/
visual45
/
objextd.mac
< prev
next >
Wrap
Text File
|
1998-08-03
|
4KB
|
115 lines
*-----------------------------------------------------------------------------*
* Macro aidant à la création de l'objet fenêtre application principale *
* Contient la définition de l'objet fenêtre *
*-----------------------------------------------------------------------------*
GWVA_WAPP_STRUCT_HEAD: macro ;METHODLIST_PTR;NAME;MENU_SPEC_PTR;WPROPERTIES;SHORTCUTLIST_PTR
; CLASS;METHODLIST_PTR;NAME;SHORTCUTLIST_PTR;PROPERTIES
GWVA_OBJ_STRUCT_HEAD GWVA_CLASS_WIND.APP,\1,\2,\5
; ;FATHER_PTR;NEXT_BROTHER_PTR;FIRST_SON_PTR
GWVA_OBJ_STRUCT_FAMILY
; FLAGS,PROPERTIES,NAME_PTR,INFO_PTR;TOPABLE_STATE
IFNC "\4",""
GWVA_WIND_STRUCT_BASE 0,\4,0,0
ELSE
GWVA_WIND_STRUCT_BASE 0,0,0,0
ENDC
; ;ICON_WIND_PTR;MENU_SPEC_PTR;MOUSE_SPEC_PTR
GWVA_WIND_STRUCT_DEF_EXTEND ,\3
; FIRST_EXT_DX,FIRST_EXT_DY;FIRST_INT_VISIBLE_W,FIRST_INT_VISIBLE_H;FIRST_CONTENTS_W,FIRST_CONTENTS_H;FIRST_CONTENTS_DX,FIRST_CONTENTS_DY;FIRST_INT_BORDERS_W,FIRST_INT_BORDERS_H
GWVA_WIND_STRUCT_FIRST_GEOMETRY 0,0
GWVA_WIND_STRUCT_USER ; ;USER_PTR1;USER_PTR2
endm
*-----------------------------------------------------------------------------*
* Macro aidant à la création de l'objet fenêtre menu *
* Contient la définition de l'objet ressource *
*-----------------------------------------------------------------------------*
GWVA_MENU_STRUCT_HEAD: macro TREE;NAME;PROPERTIES
; CLASS;METHODLIST_PTR;NAME;SHORTCUTLIST_PTR;PROPERTIES
GWVA_OBJ_STRUCT_HEAD GWVA_CLASS_MENU,,\2
; ;FATHER_PTR;NEXT_BROTHER_PTR;FIRST_SON_PTR
GWVA_OBJ_STRUCT_FAMILY
; Les 3 virgules sont nécessaires à la bonne compilation, et on ne sait pas pourquoi !
GWVA_RSC_STRUCT_BASE \1,\3,,, ; TREE;PROPERTIES;IDX;DEPTH
GWVA_RSC_STRUCT_CLONE ; ;IS_CLONE_FORM,CLONE_MAIN_PTR;CLONE_FORM_SAVE
endm
*-----------------------------------------------------------------------------*
* Macro aidant à la création d'une fenêtre iconifiée de base et formulaire *
*-----------------------------------------------------------------------------*
GWVA_WIND_ICONIFIED_STRUCT_HEAD: macro CLASS,NAME_PTR,ICON_WIND_PTR;NAME;METHODLIST_PTR
IFNC "\4",""
; CLASS;METHODLIST_PTR;NAME;SHORTCUTLIST_PTR;PROPERTIES
GWVA_OBJ_STRUCT_HEAD \1,\5,\4
; ;FATHER_PTR;NEXT_BROTHER_PTR;FIRST_SON_PTR
GWVA_OBJ_STRUCT_FAMILY
ELSE
; CLASS;METHODLIST_PTR;NAME;SHORTCUTLIST_PTR;PROPERTIES
GWVA_OBJ_STRUCT_HEAD \1,\5,'Giwn'
; ;FATHER_PTR;NEXT_BROTHER_PTR;FIRST_SON_PTR
GWVA_OBJ_STRUCT_FAMILY
ENDC
; FLAGS,PROPERTIES,NAME_PTR,INFO_PTR;TOPABLE_STATE
GWVA_WIND_STRUCT_BASE MASK_NAME|MASK_MOVER,0,\2,0
; ;ICON_WIND_PTR;MENU_SPEC_PTR;MOUSE_SPEC_PTR
GWVA_WIND_STRUCT_DEF_EXTEND \3
; FIRST_EXT_DX,FIRST_EXT_DY;FIRST_INT_VISIBLE_W,FIRST_INT_VISIBLE_H;FIRST_CONTENTS_W,FIRST_CONTENTS_H;FIRST_CONTENTS_DX,FIRST_CONTENTS_DY;FIRST_INT_BORDERS_W,FIRST_INT_BORDERS_H
GWVA_WIND_STRUCT_FIRST_GEOMETRY 0,0
GWVA_WIND_STRUCT_USER ; ;USER_PTR1;USER_PTR2
endm
GWVA_WRSC_ICONIFIED_STRUCT: macro NAME_PTR,ICON_WIND_PTR,IDX;NAME;METHODLIST_PTR
; CLASS,NAME_PTR,ICON_WIND_PTR;NAME;METHODLIST_PTR
IFNC "\5",""
GWVA_WIND_ICONIFIED_STRUCT_HEAD GWVA_CLASS_WIND.RSC,\1,\2,\4,\5
ELSE
GWVA_WIND_ICONIFIED_STRUCT_HEAD GWVA_CLASS_WIND.RSC,\1,\2
ENDC
GWVA_WRSC_STRUCT_BASE \3 ; TREE;PROPERTIES;IDX;DEPTH
GWVA_WRSC_STRUCT_CLONE ; ;IS_CLONE_FORM,CLONE_MAIN_PTR;CLONE_FORM_SAVE
endm
*-----------------------------------------------------------------------------*
* Macro aidant à la création d'une fenêtre toolbar de base *
*-----------------------------------------------------------------------------*
GWVA_WIND_TOOLBAR_STRUCT_HEAD: macro CLASS,PROPERTIES,FATHER_PTR;FIRST_SON_PTR;NEXT_BROTHER_PTR;OBJ_NAME;METHODLIST_PTR
; CLASS;METHODLIST_PTR;NAME;SHORTCUTLIST_PTR;PROPERTIES
GWVA_OBJ_STRUCT_HEAD \1,\7,\6
; ;FATHER_PTR;NEXT_BROTHER_PTR;FIRST_SON_PTR
GWVA_OBJ_STRUCT_FAMILY \3,\5,\4
; FLAGS,PROPERTIES,NAME_PTR,INFO_PTR;TOPABLE_STATE
GWVA_WIND_STRUCT_BASE 0,GWVA_WIND_MASK_TOOLBAR|(\2),0,0
; ;ICON_WIND_PTR;MENU_SPEC_PTR;MOUSE_SPEC_PTR
GWVA_WIND_STRUCT_DEF_EXTEND
; FIRST_EXT_DX,FIRST_EXT_DY;FIRST_INT_VISIBLE_W,FIRST_INT_VISIBLE_H;FIRST_CONTENTS_W,FIRST_CONTENTS_H;FIRST_CONTENTS_DX,FIRST_CONTENTS_DY;FIRST_INT_BORDERS_W,FIRST_INT_BORDERS_H
GWVA_WIND_STRUCT_FIRST_GEOMETRY 0,0
GWVA_WIND_STRUCT_USER ; ;USER_PTR1;USER_PTR2
endm